home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 November / PCWorld_2007-11_cd.bin / domácnost a kancelar / opencontacts / setup.exe / {app} / ActionPlugin / KMLField / kml.vbs next >
Encoding:
Text File  |  2007-08-18  |  207 b   |  5 lines
  1. Set GEAgent = WScript.CreateObject("GoogleEarth.ApplicationGE")
  2. GEAgent.OpenKmlFile WScript.Arguments(0), 0
  3. Set TourControl = WScript.CreateObject("GoogleEarth.TourControllerGE")
  4. TourControl.PlayOrPause
  5.